function TestTemp=CompareKeyWords(TestTemp,VecResultsKeyWords,n1,VecResultsKeyWordsTemp,n2)

nTemp3=VecResultsKeyWords{n1,1};
nTemp4=VecResultsKeyWordsTemp{n2,1};
if nTemp3>0&&nTemp4>0
    n62=1;
    while n62<=nTemp3&&TestTemp==0
        ValueKeyWords1=VecResultsKeyWords{n1,n62+1};
        n63=1;
        while n63<=nTemp4&&TestTemp==0
            ValueKeyWords2=VecResultsKeyWordsTemp{n2,n63+1};
            if strcmpi(ValueKeyWords1,ValueKeyWords2)==1
                TestTemp=1;
            end
            n63=n63+1;
        end
        n62=n62+1;
    end
end